Private mVar1 As String
    Private mVar2 As String
    Private pVar1 As String

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    Var1 = "1"
    Var2 = "2"
    mVar1 = "3"
    mVar2 = "this is a string variable"
End Sub

Private Sub myPrint()
    pVar1 = "5"
    MsgBox("Var1=" & Var1)
    MsgBox("Var2=" & Var2)
    MsgBox("mVar1=" & mVar1)
    MsgBox("mVar2=" & mVar2)
    MsgBox(txtInput)
    MsgBox("pVar1=" & pVar1)
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Call myPrint()
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
    MsgBox("Var1=" & Var1)
    MsgBox("Var2=" & Var2)
    MsgBox("mVar1=" & mVar1)
    MsgBox("mVar2=" & mVar2)
    MsgBox(txtInput)
    MsgBox("pVar1=" & pVar1)
End Sub
